home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Kick Pascal v2.10 d1.adf / INCLUDE / resources / potgo.h < prev   
Text File  |  1990-11-01  |  329b  |  15 lines
  1. {$if not def RESOURCES_POTGO_H}
  2. Const
  3.  RESOURCES_POTGO_H='h';
  4.  POTGONAME="potgo.resource";
  5. {$endif}
  6. {$if not def RESOURCES_POTGO_LIB}
  7. Const RESOURCES_POTGO_LIB=0;
  8. Var PotgoBase:Ptr;
  9. Library PotgoBase:
  10. -6: Function AllocPotBits(d0:Long):Long;
  11. -12:Procedure FreePotBits(d0:Long);
  12. -18:Procedure WritePotgo(d0,d1:Long)
  13. End;
  14. {$endif}
  15.